home *** CD-ROM | disk | FTP | other *** search
/ Roujin Z / Roujin Z.iso / mac / Roujin Z 8Bit PM / Roujin Z 8Bit PM.dxr / 00051.ls < prev    next >
Encoding:
Text File  |  1996-03-12  |  475 b   |  23 lines
  1. on startMovie
  2.   global movieName, moviedur
  3.   preLoadCast(1)
  4.   preLoadCast(53)
  5.   preLoadCast(55)
  6.   preLoadCast(59)
  7. end
  8.  
  9. on startmytimer seconds
  10.   set the timeoutLength to 60 * seconds
  11. end
  12.  
  13. on timeoutprocedure
  14.   global movieName, moviedur
  15.   if the movieTime of sprite 10 >= moviedur then
  16.     set the controller of cast movieName to 0
  17.     set the timeoutScript to EMPTY
  18.     go(marker(1))
  19.   else
  20.     startmytimer((moviedur / 60) - (the movieTime of sprite 10 / 60))
  21.   end if
  22. end
  23.